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About This Manual 

This publication contains tfie system-related information needed to install the IBM 
DOS/VS COBOL Compiler and its associated COBOL Object-time Subroutine 
Library. These program products operate under control of the IBM DOS/VSE 
System and the Conversational Monitor System (CMS) component of VM/SP (Virtual 
Machine Facility /System Product). 

This publication is designed to be used in conjunction with the DOS/VS COBOL 
Program Directory. 

Program Product Installation is directed to the system programmer or planner 
responsible for the planning and/or implementation of system generation and main- 
tenance. It contains information corresponding to that found in DOS/VSE System 
Generation. The operating system requirements, minimum machine configuration, 
work file requirements, and IOCS modules required for the DOS/VS compiler are 
described, as is the procedure for installing DOS/VS COBOL under DOS/VSE and 
VM/SP. This section also contains storage requirements for the compiler and the 
library. 

CMS messages produced for DOS/VS COBOL are described in the "Using DOS 
COBOL Under CMS" section of IBM CMS User's Guide for COBOL, SC28-6469. 

Additional Publications 

Within the text, references are made to the following publications: 
DOS/VSE System Management Guide, GC33-5371 
DOS/VSE System Generation, GC33-5377 
DOS/VSE System Control Statement, GC33-5376 

DOS/VSE Maintain System History Program (MSHP) User's Guide, GC33-6060 
IBM DOS/VS COBOL Compiler and Library Programmer's Guide, SC28-6478 
Virtual Machine Facility /SP Planning and System Generation Guide, SC1 9-6203 
Virtual Machine Facility /SP CMS User's Guide, SC1 9-6210 
DOS/VS Sort/Merge Programmer's Guide, SC33-4044 
DOS/VS Sort/Merge Installation Reference, SC33-4045. 
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Revision SC28-6479-4 
New: Programming Feature 

The MIGR compiler option flags major COBOL language elements that are no longer 
supported or are supported differently by the VS COBOL II compiler, Program 
number 5668-958. 

Maintenance: Documentation 

Service updates have been applied to DOS/VS COBOL Release 3.1. 
Minor technical changes and additions have been made to the text. 

Revision SC28-6479-3 
New: Installation Procedures 

DOS/VS COBOL Release 3 is installed by the Maintain System History Program 
(MSHP). The installation procedures have been rewritten to reflect the change. 

TNL SN20-9293 

New: Programming Feature 

Support for fixed block devices is provided under DOS/VSE with VSE/Advanced 
Function, Release 1. 
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The IBM* DOS/VS COBOL Compiler ("the compiler") and Library is a Program 
Product that operates under control of the IBM DOS/VSE* system or the Conversa- 
tional Monitor System (CMS) component of VM/SP*. The product contains the 
COBOL compiler as well as the COBOL subroutines that, when required, are com- 
bined by the Linkage Editor with the object program produced by the compiler. It 
also contains a set of transient routines that can be fetched dynamically into the 
user's storage area during program execution, and a special set of COBOL state- 
ments that can be used to process input from a 3886 Optical Character Reader. It 
accepts as input any program written in DOS/VS COBOL. 

The DOS/VS COBOL Object-time Subroutine Library ("the library") associated with 
the DOS/VS compiler is also available as a separate Program Product. The subrou- 
tine library also contains the COBOL subroutines and the set of transient routines 
that are described above. 

Link-edited programs that have been compiled by the DOS/VS COBOL compiler 
(5746-CB1) all require the presence of the DOS/VS COBOL Library at execution 
time. Note that a separate library may not be needed. The library packaged with 
the compiler can be used if the programs are executing on the same processor as 
the one on which they are compiled or if they are executing under CMS; otherwise, 
there must be a separate library (5746-LM4) for each processor on which the pro- 
grams are executing. 

The CMS installation must order and install DOS/VSE (Advanced Function Release 3 
or later). If the DOS/VS COBOL programs access any VSAM data sets, VSE/VSAM 
must also be installed. If the DOS/VS COBOL programs use SORT or MERGE, 
DOS/VSE Sort/Merge must be installed. Then, the CMS installation must install the 
DOS/VS COBOL compiler and library. The compiler must be link-edited in the back- 
ground partition of DOS/VS, and all of the compiler's relocatable modules must be 
link-edited using the ACTION REL CLEAR linkage editor control statement. The 
compiler and library may reside on the DOS/VSE system pack or on private 
libraries. 

When the DOS/VS COBOL compiler is executed under CMS, it must be executed in 
the CMS DOS environment. Before Invoking the DOS/VS COBOL compiler or exe- 
cuting DOS/VS COBOL programs under CMS, be sure that the CMS DOS environ- 
ment has been previously generated into your CMS system and is active. Also, 
when the DOS/VS COBOL compiler and DOS/VS COBOL programs are executed 
under CMS, the DOS/VSE system pack or private libraries must be available to 
CMS. 
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This section contains the information you will need to add the IBM DOS/VS COBOL 
Compiler and its associated COBOL Object-time Subroutine library to your DOS/VSE 
System. 

The first part of this section, "System Requirements" describes the operating 
system requirements, minimum machine configuration, work file requirements, and 
LIOCS module requirements for the compiler. The second part, "Installation 
Procedure" on page 20, gives instructions for adding the compiler and the library to 
the system. The third part, "Storage Requirements" on page 23, describes the 
amount of space required by the compiler and the library. 



System Requirements 



During link-editing, modules produced by the compiler require subroutines from the 
library. In addition, subroutines from the library may be required during execution. 
Therefore, the library must also be part of the system used to control program exe- 
cution, 

CMS requires access to the DOS/VSE System pack or to the private libraries that 
contain the DOS/VS COBOL compiler or subroutines. To make the system pack 
available at virtual address 195 as your C-disk, specify the fiiemode when the CMS 
DOS environment is invoked: 

ACCESS 195 C 
SET DOS ON C 



'\^ 



For DOS/VS, the compiler and the library operate under the control of the IBM Disk /^ ^ 

Operating System (DOS/VSE). A DOS/VSE Advanced Function Release 3 system is V^ 

the minimum level required. The minimum machine configuration and the operating 
system requirements to support the compiler and the library are described in this 
section. Execution-time considerations and special requirements for use of the Sort 
feature and the Symbolic Debug feature are also discussed. 

For CMS, the compiler and the library are controlled by the CMS DOS environment. 
A DOS/VSE system pack or the DOS/VSE private libraries must be available for 
CMS DOS use. CMS DOS requires a DOS/VSE Advanced Function Release 3 ^"^ 

system as a minimum level. The minimum virtual machine configuration and the \_j^ 

operating system requirements to support the compiler and the library under CMS 
are described in this section. Other execution-time considerations are also dis- 
cussed in this section. 

Operating System Requirements 

If the SORT or MERGE verb is used in the source program under DOS/VSE, the 

DOS/VSE Sort/Merge Program Product, Program Number 5746-SM2, is required. 

For further information on this product, see DOS/VS SORT/MERGE Programmer's /f^A 

Guide and DOS/VS SORT/MERGE Installation Reference Material. \. 



''v_y 
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To make private libraries at address 193 available, access the disk specifying some 
CMS mode letter such as D, and issue ASSGN and DLBL commands after the CMS 
DOS environment is invoked: 

ACCESS 193 D 

SET DOS ON 

ASSGN SYSCLB D 

DLBL IJSYSCL D DSN ? (SYSCLB) 

ASSGN SYSRLB D 

DLBL JJSYSKL D DSN ? (SYSRLB) 

Machine Configuration for DOS/VSE 

The minimum DOS/VSE machine configuration required to use the DOS/VS COBOL 
compiler and library is: 

1. A System/370, 303X or 4300 model supported by DOS/VSE. At least 128K bytes 
must be available to the compiler. 

2. Six work files. 

The system logical unit SYSLNK must be assigned to a single area (extent) on a 
2311, 2314, 2319, 3330, 3340, 3350, 3375, or fixed block mass storage device. 

Five programmer logical units (SYS001 through SYS005) must reside on 2400, 
3410, or 3420 tape units, or on 2311, 2314, 2319, 3330, 3340, 3350, 3375, or fixed 
block mass storage devices. (Two programmer logical units, as well as the 
operating system, must reside on a mass storage device.) 

If the four remaining logical units reside on tape, there must be a separate tape 
unit for each data set. If they reside on a mass storage device, there must be 
enough space on that device. See "Work File Requirements" on page 6 for 
further information. 

Workfile assignments must be made as follows: 

SYSOOI-disk unit 

SYS002— disk or tape unit 

SYS003— disk or tape unit 

SYS004— disk or tape unit 

SYS005— disk or tape unit (required when Symbolic Debug is requested 

at compile time) 
SYS006— disk unit (required for FIPS). 

Note that SYSLNK need not be assigned at compile time unless the CATAL or 
LINK option is in effect. 

The filenames for SYSLNK and SYS001 through SYS006 on the TLBL or DLBL 
statements are IJSYSLN, IJSYS01, IJSYS02, IJSYS03, IJSYS04, IJSYS05, and 
IJSYS06, respectively. 

3. A device for direct operator communication. 

4. A device, such as a card reader, for the job input stream. 

5. A device, such as a printer or a tape unit, for system output files. 

6. The floating-point arithmetic feature, if floating point literals or calculations are 
used. 

Note: All devices currently supported by previous IBM DOS COBOL compilers are 
supported by the IBM DOS/VS COBOL Compiler. These include: 3504/3505 (with 
OMR), 3525 (with RCE and combined function processing), 3410/3420 Tapes, 3881 
Optical Mark Reader, and 3330 Disk. The DOS/VS compiler also supports the 5425 
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Multifunction Card Unit, 2560 Multifunction Card Machine, 3203 and 5203 Advanced 
Printers, 3886 Optical Character Reader, 3340 Disk Facility, 3344 Direct Access 
Storage, 3350 Direct Access Storage in 3330-1 compatibility mode, and 3540 Diskette 
Input/Output Unit. 

Execution-Time Considerations 

The amount of virtual storage must be sufficient to accommodate at least: 

• The selected control program 

• Support for the file processing techniques used 

• The load module to be executed. 

If execution statistics, VSAM, or the 3886 Optical Character Reader feature are 
requested, additional virtual storage must be available to accommodate its dynamic 
space requirements. 

Use of the symbolic debugging, flow trace, statement number, execution statistics, 

option or the 3886 Optical Character Reader feature requires additional storage 

during execution. See IBM DOS/VS COBOL Compiler and Library Programmer's ,^ ^ 

Guide for further information. V^ 

Sort/i\/ierge Feature Considerations 

The DOS/VS Sort/Merge Program Product, Program Number 5746-SM2, must be 
executed under the control of DOS/VSE. It requires the following minimum machine 
configuration. 

1. The DOS/VS Sort/Merge Program Product uses 40K bytes; an additional 6K 
bytes are needed for DOS/VSE and for user-written routines. 

Note: Performance often increases significantly if 50K bytes is available for i J 

operation of the Sort/Merge program. At the 100K-byte level, the performance 
could be even higher. 

2. Standard instruction set. 

3. At least one 2314, 2319, 3330, 3333, 3340, or 3350 work file. (System residence 
requirements may necessitate having an additional disk storage unit for 
sorting.) 

4. One IBM 1403, 1443, 3203, 5203, or 3211 Printer, or one IBM operator communi- 

cation device (for example, 3215). ( i 



5. One IBM 1442, 2501, 2520, 2540, 3505, 3525, or 2560 Card Reader, or one IBM 
2400 or 3400 Series Magnetic Tape Unit (7- or 9-track) assigned to SYSIPT and 
SYSRDR. 

6. Three IBM 2400 or 3400 Series Magnetic Tape Units for work files when tape 
units are to be used for intermediate storage. For a merge operation, no work 
units are required. 

Symbolic Debug Considerations 

To use the Symbolic Debug feature of the DOS/VS compiler, a fifth work file 
(SYS005) is required at compile time. When symbolic debugging is requested, the 
compiler records, in SYS005, the information needed to produce a symbolic for- 
matted dump if the program terminates abnormally or if dynamic dumps are 
requested. Thus, the file assigned to SYS005 at compile time must also be assigned 
at execution time. This file need not necessarily be assigned to SYS005, but it must 
be assigned in the partition in which the program is executed. 
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SYS005 can be allocated with the other system work files (SYS001, SYS002, SYS003, 
SYS004) at system generation time. Each COBOL source program requesting sym- 
bolic debugging then uses the same work file. However, unique symbolic debug- 
ging work file assignments are required when several COBOL programs are to be 
compiled in the same job. If there is only one SYS005 allocated for use by all 
COBOL programs, information recorded on the file during compilation of one 
program is overlaid by Information placed there during compilation of a subsequent 
program. Then, when the object modules are link-edited and executed, the informa- 
tion recorded during compilation will not be available if it has been overlaid. 

To avoid the loss of the information needed to produce a symbolic formatted dump, 
assign a unique symbolic debugging work file for each COBOL source program to 
be compiled. On a mass storage device, these symbolic debugging work files must 
be assigned to non-overlapping extents. The following example shows how to use 
ASSGN statements to define the symbolic debugging work file on disk. Note that the 
compilation step assigns this data set to SYS005; at execution, it is assigned to 
SYS006. 

// JOB SAMPLE 

// OPTION SYM,NODECK,NOLISTX,NOXREF,LINK 

// ASSGN SYS005,X'192' 

// DLBL DEMOXX, 99/101, SO 

// EXTENT SYSO05, mill, 1,0, 1100,50 

// EXEC FCOBOL 

CBL SYMDMP 

(COBOL source deck) 

/* 

// EXEC LNKEDT 

// ASSGN SYS006,X'192' 

// DLBL DEMOXX, 99/101, SD 

// EXTENT SYS006, mill, 1,0, 1100, 50 

// EXEC 

(SYMDMP control cards) 

/* 
/& 

If the symbolic debugging work file is defined as a tape, one physical reel Is 
required. The file-protect ring must be in the tape reel during compilation and exe- 
cution. 

FIPS Considerations 

SYS006 is required only for FIPS processing. After printing the header and any CBL 
card options on SYSLST, the compiler writes the compilation listing on SYS006 as 
input to the FIPS phases. The FIPS output is written on SYSLST. 

Machine Configuration for CIVIS 

The minimum CMS virtual machine configuration will support the DOS/VS COBOL 
compiler and library. 

1. A CMS virtual machine with a minimum of 320K bytes of virtual storage and with 
the CMS DOS environment active is required. The compiler uses at least 60K 
bytes of CMS user storage. 

2. System and Logical Units. 
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SYSIN/SYSIPT must be assigned to the device tliat contains tiie input source file. 
SYSIN/SYSIPT can be assigned to a reader, tape, or disk. 

The user can issue the ASSGN command for the following units: 

SYSPCH to tape, punch, disk, or IGN 
SYSLSTto tape, printer, disk, or IGN 
SYSLOG to terminal 
SYS001-SYS002 to disk 
SYS003-SYS005 to tape or disk 
SYS006 to disk. 

Note: CMS allows "disk" to also be the 3350 in native mode. CMS does not 

support the 3540 diskette, the 2311 disks, or the 2321 datacell. If SYSIN/SYSIPT 

is unassigned at compilation time, the CMS DOS COBOL interface issues an 

error message and terminates the FCOBOL command. /"^ 

If SYSPCH, SYSLST, SYSLOG, or SYSOOOI-SYSnnn is unassigned at compilation ^^ 

time, the CMS DOS COBOL Interface sends the output to the SYSIN disk (if 

SYSIN is assigned to a read/write disk) or to the user's A-disk. ^ x^ 

Note: SYSLNK must not be assigned; it is not supported as a system logical V _y 

unit under CMS DOS. 

3. Device Support 

The following devices, which are supported by DOS/VS, are not supported by 
CMS DOS: 



• Card Readers: 1442, 2560P, 2560S, 2596, 3504, 5425P, and 5425S 

• Disks: 3540,2311,2321 

• Printers: 2560P, 2560S, 3203, 3525, 5203, 5425P, and 5425S 

• Otiier Devices: 3881 OMR, 38860CR. 

Not all of the DOS/VSE LIOCS modules are supported in CMS DOS; see "LIOCS 
Modules" on page 8 for more information. 

Execution-Time Considerations 

If symbolic debugging is requested, an additional work file, SYS005, should be 
assigned at compile time. If the file is not assigned, the CMS DOS COBOL interface 
directs the output to the SYSIN disk (if SYSIN is assigned to a read/write disk) or to 
the user's A-disk. 

The SORT verb is not supported in CMS DOS. Also, COBOL programs that use 
ISAM or segmentation cannot be executed under CMS DOS. 

Work File Requirements 

This section describes the work files required by the compiler. In addition to 
SYSRES and SYSLNK, which must be assigned to disk units, the compiler may 
require up to six work files: SYS001, SYS002, SYS003, SYS004, SYS005, and 
SYS006. SYS005 is required only when the Symbolic Debug feature is requested. 
SYS006 is required for FIPS. 

Note: SYSLNK is not supported and must not be assigned for CMS DOS. 

SYS001 and SYS006 must be assigned to a disk unit. Each of the other data sets 
(SYS002, SYS003, SYS004, and SYS005) can be assigned to either a tape unit or a 
disk unit. 
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If the work files are on tape, each must be assigned to a separate tape unit. If the 
work files are on disk, the amount of disk work space required depends mainly on 
the size of the source program. The approximate percentages of tracks that should 
be assigned to each work file are shown in Figures 1 through 6. Estimates are for 
programs of approximately 1000 and 2100 source records. The programs are 
assumed to request a cross-reference listing, the symbolic debug feature, and the 
source program library facility (COPY and/or BASIS). Source programs with the 
library facility require the LIB option on the COBOL option card (CBL card). Pro- 
grams using NOLIB require considerably less SYS004 work space. 



O 



For DOS/VSE, work file assignments for the compiler must be made in each partition 
in which the compiler operates. For example, if the compiler can operate in either 
the background or the foreground 1 (F1) partition, work file assignments must be 
made in both the background and F1. The CMS DOS environment simulates only 
the background partition. CMS DOS does not support the 2311. 
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Figure 1. Approximate Allocation of Work File Space— IBM 2311 
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Figure 2. Approximate Allocation of Work File Space— IBM 2314 
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Figure 3. Approximate Allocation of Work File Space— IBM 3330 
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Figure 4. Approximate Allocation of Work File Space— IBM 3340 
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Figure 5. Approximate Allocation of Work File Space— IBM 3350 
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Note: Total Fixed Block Device (512 Bytes). BUFSIZE equals 512. 



Figure 6. Approximate Allocation of Work File Space— Fixed Block Device 



FIPS Work Fifes 



The number of tracks required for SYS006 (the FIPS input file) depends on the size 
of the source program and the compiler options specified. As basic output, each 
record contains a line of the compilation listing and is 121 characters in length. 
However, additional space is required whenever each of the following options is 
specified: SYM, LISTX or CLIST, XREF or SXREF. SYS006 also contains any error 
messages issued by the compiler. 



LIOCS Modules 



The following lists contain the names of the preassembled LIOCS modules used by 
the compiler. These modules are supplied by IBM as part of the relocatable library 
when the IBM DOS/VSE System is distributed. Be sure that the modules listed are 
included in the system to which the compiler is added. 

Certain preassembled LIOCS modules are required when cataloging IBM compo- 
nents to the core image library. Do not delete these modules from the relocatable 
library until after all the IBM components have been cataloged to the core image 
library and all program products have been installed. These modules are listed in 
"Required IOCS Modules" on page 19. 

Notes: 

1. Additional LIOCS modules (for ASCII processing) are distributed with the 
DOS/VSE subroutines and are added to the relocatable library with the subrou- 
tines. These LIOCS modules are listed under "Relocatable Library" on 

page 26. 

2. CMS DOS does not support all the DOS/VSE logical transients, nor all the oper- 
ands of the transients it does support. The CMS DOS logical transient support is 
described in the VM/SP User's Guide. 

The procedure for generating the compiler for use with CMS DOS is exactly the 
same as the procedure for generating it for use with DOS/VSE: the LIOCS modules 
required are the same. CMS DOS, during its open routines, checks that the file 
being opened is supported by CMS DOS. 
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Relocatable Module Naming Conventions 

Each module has an 8-character name. The name consists of a 3-character prefix 
and a 5-character field corresponding to the option permitted in generation of the 
module. The following 3-character prefixes identify the preassembled modules 
shipped by IBM: 

IJC I/O Card (CDMOD) 

IJD I/O Printer (PRMOD) 

IJF I/O Magnetic Tape (MTMOD) 

IJG Sequential Direct Access (SDMOD) 

IJH Index Sequential Direct Access (ISMOD)i 

IJI Direct Access Method (DAMOD)i 

IJJ Device Independent Access Method (DIMOD) 

UN 3540 Access Method (DUMOD)i 









ISMOD, DAMOD, and DUMOD are not supported for the CMS DOS environment. 
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CDMOD name = IJCabcde g^ 

a = F RECFORM=FIXUNB (always for INPUT and CMBND files) ^— ^ 

= U RECFORM=UNDEF 
= V RECFORM=VARUNB 

b = A CTLCHR=ASA (not specified CMBND) 
= C CCNTROL=YES 
= Y CTLCHR=YES 
= Z neither CTLCHR nor CONTROL is specified 

c = B RDONLY=YES and TYPEFLE=CMBND 
= C TYPEFLE=CMBND 
= H RDONLY=YES and TYPEFLE=INPUT 

= I TYPEFLE=INPUT f ^ 

= N RDONLY=YES and TYPEFLE=OUTPUT 
= TYPEFLE=OUTPUT 

d = B WORKA=YES and I0AREA2=YES 
= I I0AREA2=YES 
= W WORKA=YES 

= Z neither WORKA nor I0AREA2 is specified 
= Z WORKA is not specified (for CMBND files only) 

e = DEVICE=2540 
= 1 DEVICE=1442 
= 2 DEVICE=2520 
= 3 DEVICE=2501 

= 4 DEVICE=2540 and CRDERR is specified 
= 5 DEVICE=2520 and CRDERR is specified 
= 6 DEVICE=3505 

= 7 DEVICE=3525 and FUNC omitted or Func=R or P 
= 8 DEVICE=2560 and FUNC omitted or Func=R or P 
= 9 DEVICE=5425 and FUNC omitted or FUNC=R or P 
= A DEVICE=3525 and FUNC=RP 
= B DEVICE=3525 and FUNC=RW 
= C DEVICE=3525 and FUNC=PW 
= D DEVICE=3525 and FUNC=I 

= E DEVICE=3525 and FUNC=RPW /- 

= F DEVICE=2560 and FUNC=RP ^ 

= G DEVICE=2560 and FUNC=RW 
= H DEVICE=2560 and FUNC=PW 
= I DEVICE=2560 and FUNC=I 
= J DEVICE=2560 and FUNC=RPW 
= K DEVICE=5425 and FUNC=RP 
= L DEVICE=5425 and FUNC=RW 
= M DEVICE=5425 and FUNC=PW 
= N DEVICE=5425 and FUNC=I 
= DEVICE=5425 and FUNC=RPW 
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CDMOD Names 



IJCFAOn 
IJCFA0I4 
IJCFA0I5 
IJCFA0I7 
IJCFA0I8 
IJCFA0I9 
IJCFA0Z1 
IJCFA0Z4 



IJCFA0Z5 

IJCFA0Z7 

IJCFA0Z8 

IJCFA0Z9 

IJCFAOZA 

IJCFAOZC 

IJCFAOZE 

IJCFAOZF 

IJCFAOZH 

IJCFAOZI 

IJCFAOZJ 

IJCFAOZK 

IJCFAOZM 

IJCFAOZN 

IJCFAOZO 

IJCFCIZO 

IJCFCIZ1 

IJCFCIZ2 

IJCFCIZ6 

IJCFYOIO 

IJCFYOI7 



IJCFZliO 
IJCFZin 
IJCFZII2 
IJCFZII3 
IJCFZII6 
IJCFZII7 
IJCFZII8 
IJCFZil9 
IJCFZIZO 



IJCFZIZ1 
IJCFZIZ2 
IJCFZIZ3 
IJCFZIZ6 
IJCFZIZ7 
IJCFZIZ8 
IJCFZIZ9 
IJCFZIZA 
IJCFZIZB 
IJCFZIZE 
IJCFZiZF 
IJCFZIZG 
UCFZIZJ 
IJCFZIZK 
IJCFZIZL 
IJCFZIZO 
IJCFZ0I1 
IJCFZOI4 



IJCFZ0I5 


IJCUZ0I5 


IJCVZ0I9 


IJCFZ0I7 


IJCUZ0I7 




IJCFZ0I8 


IJCUZ0I8 




IJCFZ0I9 




IJCVZ0Z1 


IJCFZOID 


IJCUZ0I9 


IJCVZ0Z4 


IJCFZ0Z1 


IJCUZ0Z1 


IJCVZ0Z5 


IJCFZ0Z4 


IJCUZ0Z4 


IJCVZ0Z7 


IJCFZOZ5 


IJCUZ0Z5 


IJCVZ0Z8 


IJCFZ0Z7 


IJCUZ0Z7 


IJCVZ0Z9 


IJCFZ0Z8 


IJCUZ0Z8 


IJCVZOZF 


IJCFZ0Z9 


IJCUZOZ9 


IJCVZOZH 


IJCFZOZA 


IJCUZOZF 


IJCVZOZI 


IJCFZOZC 


IJCUZOZH 


IJCVZOZJ 


IJCFZOZD 


IJCUZOZI 


IJCVZOZK 


IJCFZOZE 


IJCUZOZJ 


UCVZOZM 


IJCFZOZF 


IJCUZOZK 


iJCVZOZN 


IJCFZOZH 


IJCUZOZM 


IJCVZOZO 


IJCFZOZI 


IJCUZOZN 




IJCFZOZJ 


IJCUZOZO 




IJCFZOZK 






IJCFZOZM 






IJCFZOZN 


IJCVA0I1 




IJCFZOZO 


IJCVA0I4 

IJCVA0I5 
IJCVA0I8 




IJCUA0I4 


IJCVA0I9 




IJCUA0I5 


IJCVA0Z1 




iJCUAOI8 


IJCVA0Z4 




IJCUA0I9 


IJCVA0Z5 
IJCVA0Z8 
IJCVA0Z9 




IJCUA0Z1 






IJCUA0Z4 






IJCUA0Z5 


IJCVAOZF 




IJCUA0Z8 


IJCVAOZH 




IJCUA0Z9 


IJCVAOZl 




UCUAOZF 


iJCVAOZJ 




IJCUAOZH 


IJCVAOZK 




IJCUAOZI 


IJCVAOZM 




IJCUAOZJ 


IJCVAOZN 




IJCUAOZK 


IJCVAOZO 




IJCUAOZM 






IJCUAOZN 






IJCUAOZO 


IJCVZII8 
IJCVZII9 
IJCVZIZ8 




IJCUZII8 


IJCVZIZ9 




IJCUZII9 


IJCVZIZF 




IJCUZIZ8 


IJCVZIZG 




IJCUZIZ9 


IJCVZIZJ 




IJCUZIZF 


IJCVZIZK 




IJCUZIZG 


IJCVZIZL 




IJCUZIZJ 


IJCVZIZO 




IJCUZIZK 






IJCUZIZL 






iJCUZIZO 


IJCVZ0I1 
IJCVZ0I4 
IJCVZ0I5 




IJCUZ0I1 


IJCVZ0I7 




IJCUZ0I4 


IJCVZ0I8 
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DAMOD 



DAMOD name = IJIabcde 

a = B RECFORM=UNDEF (handles both UNDEF and FIXUNB) 
= F RECFORM=FIXUNB 
= S RECFORM=SPNUNB 
= V RECFORM=VARUNB 



> 



b = A AFTER=YES 
= Z AFTER is not specified 



c = E IDLOC=YES and FEOVD=YES 
= I IDLOC=YES 
= R FEOVD=YES 
= Z neither is specified 

d = H ERREXT=YES and RELTRK=YES 
= P ERREXT=YES 
= R RELTRK=YES 
= Z neither is specified 



''\^ 



e = W HOLD=YES and RDONLY=YES 
= X HOLD=YES 
= Y RDONLY=YES 
= Z neither is specified 

DAMOD Names 



IJIBAIRZ 

IJIBAIZZ 

IJIBAZRZ 

IJIBAZZZ 

IJIBZIRZ 



IJIFZZZZ 

IJISAIRZ 

IJISAIZZ 

IJISAZRZ 

IJISAZZZ 



IJIBZIZZ 

IJIBZZRZ 

IJIBZZZZ 

IJIFAIRZ 

IJIFAIZZ 

IJIFAZRZ 

IJIFAZZZ 

IJIFZIRZ 

IJIFZIZZ 

IJIFZZRZ 



IJISZIRZ 
IJISZIZZ 
IJISZZRZ 
IJISZZZZ 



^ 



H^,.. 



DRMOD 



DRMOD nanne = IJMZabDO 

a = S SETDEV = YES 
= Z SETDEV = NO 

b = R RDONLY = YES 
= Z RDONLY = NO 
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DRMOD Names 

IJMZSRDO 
IJMZSZDO 
IJMZZRDO 
IJMZZZDO 



DUMOD 



^^ 



ISMOD 



o 



o 



DUMOD name = IJNDabcZ 

a = I input 
= output 

b = C ERROPT=name 

c = Z RDONLY not specified 

DUMOD Names 

IJNDICZZ 
IJNDOCZZ 

ISMOD nanne = IJHabcde 

a = A RECFORM=BOTH and IOROUT=ADD or ADDRTR 
= B RECFORM=FIXBLK and IOROUT=ADD or ADDRTR 
= U RECFORM=FIXUNB and IOROUT=ADD or ADDRTR 
= Z RECFORM is not specified and IOROUT=LOAD or RETRVE 

b = A IOROUT=ADDRTR 
= I IOROUT=ADD 
= L ICROUT=LOAD 
= R IOROUT=RETRVE 

c = B TYPEFLE=RANSEQ 
= 6 I0AREA2=YES and TYPEFLE=SEQNTL or IOROUT=LOAD 
= R TYPEFLE=RANDOM 
= S TYPEFLE=SEQNTL 
= Z neither is specified and IOROUT=LOAD or ADD 

d = C CORINDX=YES 
= Z CORINDX is not specified 

e = F CORDATA=YES, ERREXT=YES, and RDONLY=YES 
= G CORDATA=YES and ERREXT=YES 
= CORDATA=YES and RDONLY=YES 
= P CORDATA=YES 
= S ERREXT=YES and RDONLY=YES 
= T ERREXT=YES 
= Y RDONLY=YES 
= Z nothing is specified 



o 
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ISMOD Names 



IJHAARCP 
IJHAARCZ 
IJHAARZP 
IJHAARZZ 
IJHBABCP 



IJHUABZZ 
IJHUARCP 
IJHUARCZ 
IJHUARZP 
IJHUARZZ 



IJHBABCZ 
IJHBABZP 
IJHBABZZ 
IJHBARCP 
IJHBARCZ 

IJHBARZP 
IJHBARZZ 
IJHUABCP 
IJHUABCZ 
IJHUABZP 



IJHZLGZZ 
IJHZLZZZ 
IJHZRBCZ 
IJHZRBZZ 



IJHZRGZZ 
IJHZRRZZ 
IJHZRSZZ 



MTMOD 



MTMOD name = IJFabcde 

a = F RECFORM=FIXUNB or FIXBLK 

= S RECFORM=SPNUNB or SPNBLK 
= U RECFORM=UNDEF 

= V RECFORM=VARUNB or VARBLK 



= X ASCII RECFORM=FIXUNB or FIXBLK 

= N ASCII RECFORM=UNDEF 

= R ASCII RECFORM=VARUNB or VARBLK 

b = B READ=BACK 
= Z READ=FORWARD, or READ is not specified 

c = C CKPTREC=YES 
= Z CKPTREC is not specified 

d = W WORKA=YES 
= Z WORKA is not specified 

e = M ERREXT=YES and RDONLY=YES 
= N ERREXT=YES 
= Y RDONLY=YES 
= Z neither is specified 
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o 



o 









MTMOD Names 

IJFFBZZN 

IJFFZCZZ 

IJFFZZZZ 

IJFSZZWN 

IJFUZZZN 

IJFUZZZZ 
IJFVZZZN 
IJFVZZZZ 

(See "IOCS Modules" on page 29 for additional MTMOD modules.) 

Name listfor workfile type modules (TYPEFLE = WORK): 

MTMOD name = IJFabcde 

a = W always 

b = E ERROPT=YES 
= Z ERROPT is not specified 

c = N NOTEPNT=YES 
= S NOTEPNT=POINTS 
= Z NOTEPNT is not specified 

d = Z always 

e = M ERREXT=YES and RDONLY=YES 
= N ERREXT=YES 
= Y RDONLY=YES 
= Z neither is specified 

System 110 Modules: (See "Required IOCS Modules" on page 19 before deleting 
modules with the IJF prefix.) 

IJFWEZZZ 
IJFWZNZZ 
IJFWZZZZ 
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PRMOD 



PRMOD name = IJDabcde 

a = F RECFORM=FIXUNB 
= V RECFORM=VARUNB 
= U RECFORM=UNDEF 



o 



b = A CTLCHR=ASA 
= Y CTLCHR=YES 
= C CONTROL=YES 
= S STLIST=YES 

= T DEVICE=3525 with 2-line printer 
= U DEVICE=2560 
= V DEVICE=5425 
= Z neither CTLCHR nor CONTROL nor STLIST is specified 



c = P PRINTOV=YES, DEVICE not 3525 
= I PRINTOV=YES, DEVICE=3525, and FUNC Omitted or FUNC=W[T] 
= F PRINTOV=YES, DEVICE=3525, and FUNC=RW[T] 
= C PRINTOV=YES, DEVICE=3525, and FUNC=PW[T] 
= D PRINTOV=YES, DEVICE=3525, and FUNC=RPW[T] 
= E ERROPT=YES and PRINTOV=YES not specified 
= Z PRINTOV=YES not specified, and DEVICE not 3525 

= PRINTOV=YES not specified, DEVICE=3525, and FUNC omitted or FUNC=W[T] 
= R PRINTOV=YES not specified, DEVICE=3525, and FUNC=RW[T] 
= S PRINTOV=YES not specified, DEVICE=3525, and FUNC=PW[T] 
= T PRINTOV=YES not specified, DEVICE=3525, and FUNC=RPW[T] 
= U DEVICE=2560 or 5425 and FUNC=W or omitted 
= V DEVICE=2560 or 5425 and FUNC=RW 
= W DEVICE=2560 or 5425 and FUNC=PW 
= X DEVICE=2560 or 5425 and FUNC=RPW 



d = I I0AREA2=YES 
= Z I0AREA2 is not specified 

e = V RDONLY=YES and WORKA=YES 
= W WORKA=YES 
= Y RDONLY=YES 
= Z neither is specified 

PRMOD Names 



IJDFAPIZ 

IJDFAPZZ 

IJDFYPIZ 

IJDFYPZZ 

IJDFZPIZ 



IJDUZPIZ 

IJDUZPZZ 

IJDVAPIZ 

IJDVAPZZ 

IJDVYPIZ 



IJDFZPZZ 

IJDUAPIZ 

IJDUAPZZ 

IJDUYPIZ 

IJDUYPZZ 



IJDVYPZZ 

IJDVZPIZ 

IJDVZPZZ 
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^^J^^ 



IJDFUUZZ 

IJDFUUIZ 

IJDFUVZZ 

IJDFUVIZ 

IJDFUWZZ 

IJDFUWIZ 

IJDFUXZZ 

IJDFUXIZ 



IJDVUUZZ 

IJDVUUIZ 

IJDVUVZZ 

IJDVUVIZ 

IJDVUWZZ 

IJDVUWIZ 

IJDVUXZZ 

IJDVUXIZ 



IJDUUUZZ 

UDUUUIZ 

IJDUUVZZ 

IJDUUVIZ 

IJDUUWZZ 

IJDUUWIZ 

IJDUUXZZ 

IJDUUXIZ 



o 



o 



IJDFAOIZ 
IJDFARIZ 
IJDFASIZ 
IJDFATIZ 



IJDFAOZZ 

IJDFARZZ 

IJDFASZZ 

UDFATZZ 

IJDFZOIZ 

IJDFZRIZ 

IJDFZSIZ 

IJDFZTIZ 

IJDFZOZZ 

IJDFZRZZ 

IJDFZSZZ 

IJDFZTZZ 



IJDFAIIZ 
IJDFAFIZ 
IJDFACIZ 
IJDFADIZ 



IJDVAOIZ 
IJDVARIZ 
IJDVASIZ 
IJDVATIZ 



IJDVAOZZ 

IJDVARZZ 

IJDVASZZ 

IJDVATZZ 

IJDVZOIZ 

IJDVZRIZ 

iJDVZSIZ 

IJDVZTIZ 

IJDVZOZZ 

IJDVZRZZ 

IJDVZSZZ 

IJDVZTZZ 



IJDUAIIZ 
IJDUAFIZ 
IJDUACIZ 
IJDUADIZ 



IJDUAOIZ 
IJDUARIZ 
IJDUASIZ 
IJDUATIZ 



IJDUAOZZ 

IJDUARZZ 

IJDUASZZ 

IJDUATZZ 

IJDUZOIZ 

IJDUZRIZ 

IJDUZSIZ 

IJDUZTIZ 

IJDUZOZZ 

IJDUZRZZ 

IJDUZSZZ 

IJDUZTZZ 



IJDVAIIZ 
IJDVAFIZ 
IJDVACIZ 
IJDVADIZ 



IJDFZIIZ 
IJDFZFIZ 
IJDFZCIZ 
IJDFZDIZ 



iJDUZIIZ 
IJDUZFIZ 
IJDUZCIZ 
IJDUZDIZ 



IJDVZIIZ 
IJDVZFIZ 
IJDVZCIZ 
IJDVZDIZ 






IJDFYIIZ 
IJDFYFIZ 
IJDFYCIZ 
IJDFYDIZ 



IJDUYIIZ 
IJDUYFIZ 
IJDUYCIZ 
IJDUYDIZ 



IJDVYIIZ 
IJDVYFIZ 
IJDVYCIZ 
IFDVYDIZ 



IJDFVUZZ 

IJDFVUIZ 

IJDFVVZZ 

IJDFVVIZ 

IJDFVWZZ 

IJDFVWIZ 

IJDFVXZZ 

IJDFVXIZ 



IJDVVUZZ 

IJDVVUIZ 

IJDVVVZZ 

IJDVVVIZ 

IJDVVWZZ 

IJDVVWIZ 

IJDVVXZZ 

IJDVVXIZ 



IJDUVUZZ 

IJDUVUIZ 

IJDUVVZZ 

IJDUVVIZ 

IJDUVWZZ 

IJDUVWIZ 

IJDUVXZZ 

IJDUVXIZ 
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SDMOD 



SDMODxx name = IJGabcde / ^ 

a = C RECFORM=FIXUNB or FIXBLK and HOLD=YES "^-^ 

= F RECFORM=FIXUNB or FIXBLK and HOLD is not specified 

= P RECFORM=SPNUNB or SPNBLK and HOLD=YES 

= Q RECFORM=SPNUNB or SPNBLK and HOLD is not specified 

= R RECFORM=UNDEF and HOLD=YES 

= S RECFORM=VARUNB or VARBLK and HOLD=YES 

= U RECFORM=UNDEF and HOLD is not specified 

= V RECFORM=VARUNB or VARBLK and HOLD is not specified 

b = I SDMODxI 

= SDMODxO 

= U SDMODxU ^ . 



c = C ERROPT=YES and ERREXT=YES 
= E ERROPT=YES 
= Z neither is specified 

d = M TRUNCS=YES and FEOVD=YES 
= T TRUNCS=YES 
= W FEOVD=YES 
= Z neither is specified 

e = B CONTROL=YES and RDONLY=YES 
= C CCNTROL=YES 
= Y RDONLY=YES 
= Z neither is specified 

SDMOD Names 



IJGFIEWZ 

IJGFOEWZ 

IJGFUEWZ 

IJGQIEWZ 

IJGQOEWZ 



IJGQUEWZ 

IJGUIEWZ 

IJGUOEWZ 

IJGUUEWZ 

IJGVIEWZ 



IJGVOEWZ 
IJGVUEWZ 
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Name List for Workfile Type Modules (TYPEFLE == WORK) 



SDMODxx name = IJGabcde 

a = T SDMODW specifies HOLD=YES 
= W SDMODW does not specify HOLD=YES 

b = C ERROPT=YES and ERREXT=YES 
= E ERROPT=YES 
= Z neither is specified 

c = N NOTEPNT=YES 
= R NOTEPNT=POINTRW 
= Z NOTEPNT is not specified 

d = C CONTROL=YES 
= Z CONTROL is not specified 

e = T RDONLY=YES and UPDATE=YES 

= U UPDATE=YES 

= Y RDONLY=YES 

= Z neither is specified 

System 110 Modules: (See "Required IOCS Modules" before deleting modules with 
the IJG prefix.) 

IJGWEZZU 
IJGWEZZZ 
IJGWZNZZ 
IJGWZRZZ 

Required IOCS Modules 

The following preassembled IOCS modules are required when cataloging IBM com- 
ponents to the core image library. These modules are also required when installing 
program products. 

Module Names 



IJFWEZZZ IJJCPD1N 

IJFWZNZZ IJJCPD2 

IJFWZZZZ IJJCPD3 

IJGFIETZ IJJCPV 

IJGWEZZU IJJCPV1 



IJGWEZZZ IJJCPV2 

IJGWZNZZ IJJCPO 

IJGWZRZZ IJJCPON 

IJJCPA1N IJJCP1 

IJJCPDV IJJCP1N 



IJJCPDV1 IJJCP2 

IJJCPDV2 IJJCP3 

IJJCPDO 

IJJCPDON 

IJJCPD1 
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Installation Procedure ^ 

The following sections show you the steps and the libraries that are required to 
install the DOS/VS COBOL Connpiler and Library. 

DOS/VS COBOL Installation-DOS/VSE 

This section describes DOS/VS COBOL Connpiler and Library installation under 
DOS/VSE. The steps that follow present a brief overview of the installation process. 

Libraries Required— DOS/VSE 

The three libraries needed are: f ^ 

• Core image library 

• Source statement library 

• Relocatable library. /" ^ 

Installation Process— DOS/VSE 

To install DOS/VS COBOL using MSHP (Maintain System History Program), take the 
following steps: 

1. Use the INSTALL PRODUCT to install the compiler and/or library. 

2. Optionally, code the CBL statement and place it in C.CBLOPTINS to change the 
compiler default options. 

For complete details on the installation process under DOS/VSE, see the DOS/VS 
COBOL Program Directory. 

Verifying Success— DOS/VS Compiler Installation 

A sample DOS/VS COBOL program (TESTRUN) to verify the success of the compiler 
installation is available in the source statement library. The sample program will be 
placed in the source statement library during the installation process. 

Application of Corrective Maintenance 

Three linl<-edit books are supplied with the modules installed in the relocatable 
library: 

• ILACBVS for the compiler phases 

• ILBDSYML for the SYMDMP library phases 

• ILBD$LNK for the transient routines. 

It is recommended that these be used when link-editing the appropriate phases. 

Note: If user-written linkage editor control statements are used for linkage editing, 
ACTION CLEAR must be specified. 
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DOS/VS COBOL Installation-VM/SP 

This section describes DOS/VS COBOL Compiler and Library installation under 
VM/SP. DOS/VS COBOL runs in the CMS DOS environnnent. 

Installation Process under VM/SP CMS 

To install DOS/VS COBOL under CMS, take the following steps: 

1. Mount the distribution tape. 

2. IPL the DOS/VSE system. 

3. Run the DOS/VSE MSHP program to restore the private libraries (just as normal 
installation under DOS/VSE). 

For complete details on the installation process under VM/SP, see the DOS/VS 
COBOL Program Directory. 

System Generation Considerations 

The compiler and the library can be used on a system only if the following parame- 
ters are specified for the SUPVR and FOPT macro instructions during system gener- 
ation: 



SUPVR: 












FOPT: 



VSAM: 



SYSTEM = DISK 

ASCII = YES (required only when the ASCII features of the com- 

piler are used) 

MPS = BJF (required only when the compiler is to be executed 

in the foreground) 

AB = YES (for use of STATE, FLOW, STXIT, SYMDMP, and 

COUNT features) 
PCIL = YES (required only when the compiler is to be executed 

in the foreground and RELLDR = YES has not been 

specified) 
GETVIS = YES (required for use of 3886; forced by VSAM = YES, 

and required if COUNT option is specified) 
RELLDR = YES (if relocating loader is to be used) 

SYSFIL = YES (if system files are to be on disk) 

VSAM = YES (required for use of the VSAM feature) 



System options selected at system generation enable you to tailor the DOS/VSE 
compiler to fit your installation's needs. The system options that can be used to 
control compiler processing specify whether: 

Control statements are to be written on SYSLST. 

A dump is to be written on SYSLST if an abnormal termination occurs. (You 
may not want this if the SYMDMP, STATE, or FLOW features are used.) 

The object module produced by the compiler is to be link-edited. 

An object deck is to be punched. 

The COBOL source statements are to be written on SYSLST. 

A Procedure Division map. Data Division map, or cross-reference listing is to be 
written on SYSLST. 

Diagnostic messages for the source program are to be written on SYSLST. 
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Instructions for specifying these options are given in tlie publications DOS/VSE 
System Generation and DOS/VS Compiler and Library Programmer's Guide. 

Changing the Installation Defaults 

To change the compiler default values to suit your installation, a new member, 
C.CBLOPTNS, must be added to the source statement library. This module must 
contain CBL and LST option cards defining the desired defaults. These may be 
overridden at compilation time by supplying a CBL and/or LST statement in the 
compiler input stream. CMS DOS does not support the LST statement. 

CBL Statement— COBOL Option Control Statement 

Although most options for compilation are specified either at system generation 
time or in the OPTION control statement, the COBOL compiler provides an addi- 
tional statement, the CBL statement, for the specification of compile-time options 
unique to COBOL. 

The CBL statement must be placed between the EXEC FCOBOL statement and the 
first statement in the COBOL program. The CBL statement cannot be continued. 
However, if specification of options will continue past column 71, more than one 
CBL card image may be used. 

The options shown in Figure 7 on page 23 may appear in any order. No embedded 
blanks may appear in the operand field. Underscoring indicates the default value. 
No comments shouid appear in the operand field. 

For additional information on the CBL statement, see DOS/VS COBOL Compiler and 
Library Programmer's Guide. 



22 DOS/VS COBOL Installation Reference Material 



CBL 



o 



^^JlUjlllllilllll'^ 



o 



ADV 

NOADV 



,CATALR 
.NOCATALR 



.FLAGE 
,FLAGW 



.LIB 
.NOLIB 



.OPTIMIZE 

,OPT 

.NOOPTIMIZE 



,NOOPT 

LsPACEn 



,SUPMAP 
,NO$UPMAP 



.SYNTAX 

.CSYNTAX 

.NOSYNTAX 



.VERBREF 
,KOVERBREF 



.APOST 
, QUOTE 



.CLIST 
.NOCLIST 



.FLOW[=nn] 



.LVL=A|B|CiD 
,NOLVL 



.PMAP=h 




,TRUNC 



.NOTRUNC 



.VERBSUM 
,NOVERBSUM 



Figure 7. CBL Statement options 



E 



,BUF=nnnnn 



.COUNT 
.NOCOUNT 



.LANGLVLd) 
,LANGLVL(2) 



,MIGR 
.NOMZGR 



..SEQ 

.NOSEQ 



.STXIT 
.NOSTXIT 



.SYMDMP[=filenanie] 



.VERB 
.NOVERB 



.ZWB 
,NOZWB 



Storage Requirements 



This section defines the partition size required by the DOS/VSE compiler alone and 
the storage required by the compiler together with the DOS/VSE subroutine library 
on the core image library. The storage needed for the compiler, subroutines, and 
required IOCS modules on the relocatable library is also given. 



Virtual Storage 



O 



A minimum 64K bytes of virtual storage is required. The compiler needs added 
virtual storage if a BUF parameter is specified on the CBL card. Enough extra 
storage must be allocated to compensate for six buffers of that size. 
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Core Image Library 



Compiler Phases 



Number of Phases 


Number of Library Blocks For AF3* (Phys- 
ical Records) 


Compiler 


26 


700 


Transient routine 


4 


4 


Library phases 


14 


32 


*AII devices supported by Advanced Function, Release 3. 



FCOBOLOO 

FCOBOL04 (Notes) 

FCOBOL05 

FCOBOL06 (Note1) 

FCOBOL08 

FCOBOL10 

FC0B0L11 

FC0B0L12 

FCOBOL20 

FC0B0L21 



V y 



FCOBOL22 
FCOBOL25 
FCOBOL30 
FCOBOL35 
FCOBOL40 
FCOBOL45 
FCOBOL50 
FC0B0L51 
FCOBOL60 
FCOBOL62 
FCOBOL63 
FCOBOL64 
FCOBOL65 
FC0B0L61 
FCOBOL70 
FCOBOL80 



(Note 2) 
(Note 6) 
(Note 7) 

(Note 3) 

(Note 2) 
(Note 4) 
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o 



Notes: 

1. Phases FCOBOL05, FCOBOL06, and FCOBOL08 are executed only when the 
lister feature is used. 

2. Phases FCOBOL25 and FCOBOL65 are executed only when symbolic debugging 
is used. 

3. If optimization is not requested, phase FCOBOL60 is called instead of 
FCOBOL62, FCOBOL63, and FCOBOL64. 

4. If FIPS processing is not requested, phase FCOBOL80 is not called, and compi- 
lation terminates after phase FCOBOL70. 

5. Phase FCOBOL05 is executed only if LIB option is set. 

6. Phase FCOBOL35 is executed only if USE FOR DEBUGGING is used. 

7. Phase FCOBOL45 is executed only if UNSTRING is used. 

Transient Routines 

$$BCOBEM (Executed only when SYMDMP, FLOW, STATE, or COUNT is 

specified.) 
$$BCOBER 
$$BC0BR1 
$$BFCMUL 



Library Phases 



o 






Executed only when SYMDMP is specified. 

ILBDMP01 
ILBDMP02 
ILBDMP04 
ILBDMP10 
ILBDMP11 
ILBDMP12 
ILBDMP13 
ILBDMP14 
ILBDMP20 
ILBDMP21 
ILBDMP22 
ILBDMP23 
ILBDMP24 
ILBDMP25 
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Relocatable Library 



Number of Modules 


Number of Library Blocks 
(Physical Records) 


Compiler 


41 


Approximately 3000 


Library 


95 


Approximately 460 


IOCS 


7 


Approximately 32 






Compiler Modules 



ILACBVS 

ILACBLOO 

ILACBL01 

ILACBL04 

ILACBL05 

ILACBL06 

ILACBL08 

ILACBL10 

ILACBL11 

ILACBL12 
ILACBL20 
ILACBL21 
ILACBL22 
ILACBL25 



ILACBL30 
ILACBL35 
ILACBL40 
ILACBL45 
ILACBL50 
ILACBL51 
ILACBL60 

ILACBL62 
ILACBL63 
ILACBL64 
ILACBL65 
ILACBL61 
ILACBL70 



ILACBL80 
ILACBL81 
ILACBL82 
ILACBL83 
ILACBL84 
ILACBL85 
ILACBL86 
ILACBL87 
ILACBL88 
ILACBL89 
ILACBL8A 
ILACBL8B 
ILACBL8C 
ILACBL8D 



26 DOS/VS COBOL Installation Reference Material 



Subroutines 



Library Modules 



Approximate Number of 
Bytes of Virtual Storage 



ILBDABXO 
ILBDACPO 
ILBDACSO 
ILBDADRO 
ILBDANEO 
ILBDANFO 
ILBDASYO 



495 
1050 
242 
350 
325 
110 
90 



Bloci(s 



o 



ILBDATBO 

ILBDBIDO 

ILBD6IE0 

ILBDBIIO 

ILBDBUGO 

ILBDCKPO 

ILBDCLKO 

ILBDCLSO 

ILBDCMMO 

ILBDCRDO 

ILBDCT10 

ILBDCVBO 

ILBDDAEO 

ILBDDBGO 

ILBDDCIO 

ILBDDIOO 



260 
115 
120 
465 
1080 
850 
60 

150 

1032 

150 

480 

1136 

345 

2805 

180 

720 



2 
2 
2 
4 
8 
6 
2 

2 
7 
2 
3 
8 
4 
16 
5 
5 



ILBDDSPO 

ILBDDSRO 

ILBDDSSO 

ILBDDTEO 

ILBDDUMO 

ILBDEFLO 

ILBDETBO 



1330 
335 
810 
436 
2 
525 
260 






ILBDFLWO 
ILBDFMTO 
ILBDFPWO 
ILBDGDOO 
ILBDGPWO 
ILBDIDAO 

ILBDIDBO 
ILBDIDRO 
ILBDIDTO 
ILBDIFBO 
ILBDIFDO 
ILBDIMLO 
ILBDINSO 
ILBDINTO 



1260 
185 
810 
160 
90 
400 

120 

1665 

695 

300 

160 

90 

1932 

290 



9 
3 
4 
2 
2 
3 

2 
8 
4 
3 
5 
2 
11 
4 



ILBDISEO 

ILBDISMO 

ILBDITBO 

ILBDIVLO 

ILBDMFTO 

ILBDMNSO 



480 
370 
260 
75 
150 
375 



4 
4 
12 
2 
3 
4 



ILBDMOVO 



70 
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Approximate Number of 
Library Modules Bytes of Virtual Storage Blocks 

ILBDMRGO 1160 3 

ILBDMVEO 250 3 

ILBDNSLO 620 5 

ILBDOCRO 1925 10 

ILBDASYO 135 3 

ILBDRCRO 150 2 

ILBDRDIO 410 4 

ILBDRDSO 240 3 

ILBDRFMO 135 2 

ILBDSAEO 400 4 

ILBDSCHO 745 4 

ILBDSEMO 280 5 

ILBDSETO 300 3 

ILBDSIOO 2856 17 

ILBDSMVO 60 2 

ILBDSPAO 3824 20 

ILBDSRTO 3720 19 

ILBDSTRO 80 3 

ILBDSSNO 300 3 

ILBDSTGO 672 6 

ILBDSTIO 600 4 

ILBDSTNO 1740 8 

ILBDTABO 475 4 

ILBDTCOO 1170 7 

ILBDTC20 500 3 

ILBDTC30 4220 19 

ILBDTEFO 600 6 

ILBDTODO 200 2 

ILBDTRNO 260 2 

ILBDUPSO 110 2 

ILBDUSLO 365 3 

ILBDUSTO 2176 12 

ILBDUTBO 260 12 

ILBDVBLO 315 4 

ILBDVCOO 515 3 

ILBDVIOO 4660 22 

ILBDVMOO 470 4 

ILBDVOCO 4280 18 

ILBDVTRO 140 2 

ILBDWTBO 260 3 

ILBDXDIO 275 3 

ILBDXMUO 185 2 

ILBDXPRO 670 6 

ILBDXTNO 290 3 



'1^., 
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IOCS Modules 

Needed when the ASCII Support Feature is used. 

IJFXBZZN 
IJFXBZZZ 
IJFXZZZZ 
IJFNZZZN 
IJFNZZZZ 
IJFRZZZN 
IJFRZZZZ 



O 

o 



o 



o 
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Appendix. Device Information 



This appendix gives information regarding specific input/output devices that can be 
used with a DOS/VS COBOL program. 



Minimum and Maximum Blocic Size Values 

The minimum and maximum blocl< sizes that can be specified for specific devices 
are shown in Figure 8. 



Device 
Type 




Fixed and Undefined Records 
Biocic Size (Bytes) 


Variable Records 
Block Size (Bytes) 








Minimum 


Maximum 


Minimum Maximum 


Card Reader 




1 


80 


9 


80 


Card Punch 




1 


81 


9 


89 


Print Line Length 
(1403, 3800, etc.) 
120 characters 
132 characters 
144 characters 
150 characters 




1 
1 
1 
1 


121 
133 
145 
151 


9 
9 
9 
9 


129 
141 
153 
159 


Magnetic Tape 




18 


32760 


18 


32760 


Direct Access 
2314 
3330 
3340 
3350 
3375 






7294 
13030 

8368 
19069 
32760 


9 
9 
9 
9 
9 


7294 
18030 

8368 
19069 
32760 


Notes: 












1. For DOS/VSE Fixed Block Architectu 


re devices, see the manuals describ 


ing the devices you are using. 




2. For direct access 


devices with the track overflow feature, 


the maximum is 32760 for each device. 





Figure 8. DOS/VS COBOL Devices— Minimum and Maximum Blocl< Sizes 
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Index 



apostrophe, APOST option and 23 

arithmetic expressions with COMPUTATIONAL fields: 

TRUNC/NOTRUNC option and 23 
ASCII collating sequence support 

ASCII parameter required 21 

IOCS modules required 29 

Sort/Merge Program required 2 

B 

background partition support by CMS 7 
BUF option (CBL statement) 

format 23 

virtual storage required when specified 23 



CATAL option, SYSLNK file and 3 
CATALR/NOCATALR option (CBL statement) 

format 23 
CBL statement: COBOL option control 

statement 22—23 
CDMOD module names 10—11 
CDMOD names 

12 

12 

13 



DAMOD names 
DRMOD names 
DUMOD names 
introduction 8 
ISMOD names 
MTMOD names 



13 
14 



naming conventions for relocatable library 

PRMOD names 16—18 

required 19 

SDMOD names 18 

system 15, 19 
changing the installation defaults 22—23 
CLIST/NOCLIST option (CBL statement) 

format 23 
CMS considerations 

background partition supported 7 

device support 3, 6 

execution-time requirements 1,6 

installation requirements 1, 5 

LIOCS modules and 8 

machine configuration 5 

private library access 3 

separate library not needed 1 

SYSLNK not supported 6 

system requirements 2, 3 

work file requirements 6 
CMS requirements 5 



compiler 

CBL statement options 
formats 23 

system options controlling 23 
compiler and library 
contents 1 
installation 21 
storage required 23 
COMPUTATIONAL receiving fields, TRUNC/NOTRUNC 

option 23 
condensed listing, compiler, specified by CLIST 

option 23 
contents of DOS/VS COBOL compiler and library 

program product 1 
core image library 

storage required for compiler, and library 
phases 23 
COUNT/NOCOUNT option (CBL statement) 
format 23 

installation parameter required 21 
virtual storage required 4 
CSYNTAX/SYNTAX/NOSYNTAX option (CBL statement) 

format 23 
C.CBLOPTNS source statement library member 22 



DAMOD module names 12 
debug (see SYMDMP option) 
default values of CBL statement options, 

changing 22—23 
devices 

compiler use 3—4 

minimum and maximum block sizes 30 

Sort/Merge Program requirements 4 

storage requirements for 23 

supported by CMS 6 
disk units, work file allocations to 5—7 
DOS/VS requirements 3 
DRMOD names 12 
DUMOD module names 13 



execution statistics: virtual storage required 
execution-time CMS requirements 1, 6 
execution-time considerations 4 



Federal Information Processing Standard (see FIPS) 

filenames (work files) 3, 6 

files, system: installation parameter required 21 
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files, work {see work files) 
FIPS 

considerations 5 

flagger, LVL option specification of 23 

work files 

allocations required 7 
contents 7 
fixed block devices 3, 8 
FLAGW/E option (CBL statement) 

format 23 
FLOW option (CBL statement) 

additional storage required 4 

format 23 

installation parameter required 21 
FOPT macro instruction, parameters required for 21 

I 

installation procedure 

changing option defaults 22 

compiler and library— DOS/VSE 20 

compiler and library— VM/SP 21 

system generation considerations 21 
installation requirements for CMS 1 
IOCS modules 

ASCII support 29 

blocks required for storage 26 
ISMOD module names 13 



library 

installation parameters governing partitions 21 

object-time subroutine 
contents 1 

storage required 23—29 
LIB/NOLIB option (CBL statement) 

format 23 
line-spacing on compiler output listing: SPACEn option 

and 23 
LINK option (OPTION statement) 

SYSLNK file and 3 
LIOCS modules and CMS 8 
lister feature: compiler phase names 24—25 
logical units: assignment for compiler use 3 
LST statement (lister feature) 

CMS does not support 22 
LVL option (CBL statement) 

format 23 

M 

machine configuration 

for CMS 5—6 

for DOS/VS 3 
macro instruction parameters required for DOS/VS 
compiler and library installation 21 



MIGR/NOMIGR option (CBL statement) 

format 23 
module names 

MTMOD 14-15 

SDMOD 19 
MTMOD module names 14—15 



object-time subroutine library 

contents 1 
operating system requirements 2—3 
OPTIMIZE/NOOPTIMIZE option (CBL statement) 

format 23 
options 

CBL statement 

changing installation defaults 22 
format 23 
LST statement 
format 23 
system 21 



parameters required in SUPV, FOPT, and VSAM macro 

instructions 21 
partitions, effect of on assignment 7 
phases, compiler 

blocks required 

core image library 23 
relocatable library 26 

listed 24 
PMAP = h option (CBL statement) 

format 23 
private library 

CMS access 2 

core image, effect of macro instruction on 21 
PRMOD module names 16—18 
program logical units: required assignments 3, 6—8 



V. 



Q 



quotation marks, QUOTE option and 23 
QUOTE/APOST option (CBL statement) 
format 23 



relocatable library, blocks required for compiler, 

library, and IOCS modules 26 
required IOCS modules 19 



sample program, using after installation 20 
SDMOD module names 18—19 
separate library unnecessary for CMS 1 
separately-signed numeric sort keys: Sort/Merge 
program required 2 



V 



\ -y 
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C 



SEQ/NOSEQ option (CBL statement) 

format 23 
SORT verb operating system requirements 

Sort/Merge feature 
considerations 4 
program produce required 2 
SPACEn option (CBL statement) 23 
STATE/NOSTATE option (CBL statement) 

additional storage required 4 

format 23 

installation parameter required 21 
statistics, execution: virtual storage required 4 
storage requirements 

core image library 23—25 

general description 3 

partition size 23 

relocatable library 26—29 

Sort/Merge program 4 

subroutines (each) 27—29 
STXIT/NOSTXIT option (CBL statement) 

format 23 

installation parameter required 21 
subroutines, object-time, storage required for 

each 27—29 
SUPMAP/NOSUPMAP option (CBL statement) 

format 23 
SUPVR macro instruction, parameters required for 

compiler 21 
SXREF/NOSXREF option (CBL statement) 

format 23 
symbolic debug considerations 4—5 
symbolic dump option (see SYMDMP option) 
SYMDMP option (CBL statement) 

format 23 

general considerations 4—6 

installation parameter required 21 

multiple COBOL compilations 4 

work files 4—5 
SYNTAX/CSYNTAX/NOSYNTAX option (CBL statement) 

format 23 
SYSLNK file 

assignment for compiler use 3 

CATAL and LINK options and 3 

not supported for CMS 6 

required 6 
SYSRES file assignment required 6 
system generation considerations 21—23 
system I/O module names 

MTMOD 14-15 

SDMOD 19 
system options 23 
system requirements 

for CMS 2 

for DOS/VSE 2 

machine configuration 
for CMS 5—6 
for DOS/VSE 3-4 



system, DOS, minimum release level 

required 2 
SYSOOn work files: assignment for compiler use 
SYS005 for symbolic debug feature 3, 6 
SYS006FIPS work file 3,5 



tape work file requirements 6 
transient routines 

core image library storage required 23 

listed 25 

object-time library, in 1 
TRUNC/NOTRUNC option (CBL statement) 

format 23 

u 

units, logical: assignment for compiler 

for CMS 5 

for DOS/VSE 3-4 
using the sample program 20 



VERBREF/NOVERBREF option (CBL statement) 

format 23 
VERBSUM/NOVERBSUM option (CBL statement) 

format 23 
VERB/NOVERB option (CBL statement) 

format 23 
VSAM macro instruction parameters 

required 21 

w 

work files, allocation, disk devices 6—8 



ZWB/NOZWB option (CBL statement) 
format 23 



3,6 



Numerics 



23 



23 



2311 disk unit, work file allocations to 
2314 disk device 

core image library storage for 

work file allocation to 7 
3330 disk device 

core image library storage for 

used with Sort/Merge 4 

work file allocation to 7 
3340 disk unit, work file allocations to 
3350 direct access storage 

used with CMS 6 

used with Sort/Merge 4 

work files 3, 7 
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3886 Optical Character Reader 
GETVIS parameter required 
virtual storage required 4 



21 



v.y 
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